home *** CD-ROM | disk | FTP | other *** search
- object SynthEditorForm: TSynthEditorForm
- Left = 220
- Top = 198
- BorderIcons = []
- BorderStyle = bsSingle
- Caption = 'SynthForm'
- ClientHeight = 453
- ClientWidth = 410
- Color = clBlack
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = True
- Position = poDefault
- Scaled = False
- OnCreate = FormCreate
- PixelsPerInch = 96
- TextHeight = 13
- object SynthPanel: TWPControl
- Left = 0
- Top = 0
- Width = 375
- Height = 412
- Color = clBlack
- ParentColor = False
- ParentShowHint = True
- OnResize = SynthPanelResize
- object VideoPanel: TWPControl
- Tag = -1
- Left = 0
- Top = 37
- Width = 375
- Height = 239
- OnDropFiles = VideoPanelDropFiles
- Color = clBlack
- ParentColor = False
- ParentShowHint = True
- Anchors = [akLeft, akTop, akRight, akBottom]
- object Flash: TFlashPlayerControl
- Left = 170
- Top = 40
- Width = 192
- Height = 192
- TabOrder = 0
- Visible = False
- FrameNum = -1
- Playing = False
- Quality = 1
- ScaleMode = 0
- AlignMode = 0
- BackgroundColor = -1
- Loop = False
- WMode = 'Window'
- Menu = False
- Scale = 'ShowAll'
- DeviceFont = False
- EmbedMovie = False
- Quality2 = 'High'
- AllowScriptAccess = 'always'
- end
- object BlankPanel: TWPControl
- Left = 0
- Top = 35
- Width = 376
- Height = 181
- Color = clMaroon
- ParentColor = False
- ShowHint = True
- Visible = False
- OnResize = BlankPanelResize
- object lblDemoTitle: TLabel
- Left = 165
- Top = 125
- Width = 45
- Height = 16
- Caption = 'DEMO'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWhite
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object lblDemoMsg: TLabel
- Left = 40
- Top = 150
- Width = 294
- Height = 13
- Caption = 'The demo version will only play the first 20 seconds of a video.'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWhite
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- end
- end
- object ControlTopPanel: TWPControl
- Left = 0
- Top = 286
- Width = 375
- Height = 80
- OnDropFiles = VideoPanelDropFiles
- Color = clGray
- ParentColor = False
- ShowHint = True
- Anchors = [akLeft, akRight, akBottom]
- object StartMSDig: TDigiWheel
- Tag = -4
- Left = 64
- Top = 55
- Width = 21
- Height = 8
- Cursor = crSizeNS
- Options = [wwBorder, wwIncMode]
- MoveSpeed = 4
- SlowMotionDiv = 4
- Max = 999
- DefaultValue = 0
- OnChange = StartHourDigChange
- MouseButton = mbLeft
- BmpList = SynthResModule.DigitsIL
- end
- object EndMSDig: TDigiWheel
- Tag = -12
- Left = 333
- Top = 55
- Width = 21
- Height = 8
- Cursor = crSizeNS
- Options = [wwBorder, wwIncMode]
- MoveSpeed = 4
- SlowMotionDiv = 4
- Max = 999
- DefaultValue = 0
- OnChange = StartHourDigChange
- MouseButton = mbLeft
- BmpList = SynthResModule.DigitsIL
- end
- object PosMinuteDig: TQuickDigiLabel
- Tag = -6
- Left = 117
- Top = 55
- Width = 14
- Height = 8
- BmpList = SynthResModule.DigitsIL
- NumDigits = 2
- end
- object PosSecondDig: TQuickDigiLabel
- Tag = -7
- Left = 134
- Top = 55
- Width = 14
- Height = 8
- BmpList = SynthResModule.DigitsIL
- NumDigits = 2
- end
- object PosHourDig: TQuickDigiLabel
- Tag = -5
- Left = 107
- Top = 55
- Width = 7
- Height = 8
- BmpList = SynthResModule.DigitsIL
- NumDigits = 1
- end
- object StartSecondDig: TDigiWheel
- Tag = -3
- Left = 47
- Top = 55
- Width = 14
- Height = 8
- Cursor = crSizeNS
- Options = [wwBorder, wwIncMode]
- MoveSpeed = 4
- SlowMotionDiv = 4
- Max = 59
- DefaultValue = 0
- OnChange = StartHourDigChange
- MouseButton = mbLeft
- BmpList = SynthResModule.DigitsIL
- NumDigits = 2
- end
- object StartMinuteDig: TDigiWheel
- Tag = -2
- Left = 30
- Top = 55
- Width = 14
- Height = 8
- Cursor = crSizeNS
- Options = [wwBorder, wwIncMode]
- MoveSpeed = 4
- SlowMotionDiv = 4
- Max = 59
- DefaultValue = 0
- OnChange = StartHourDigChange
- MouseButton = mbLeft
- BmpList = SynthResModule.DigitsIL
- NumDigits = 2
- end
- object StartHourDig: TDigiWheel
- Tag = -1
- Left = 20
- Top = 55
- Width = 7
- Height = 8
- Cursor = crSizeNS
- Options = [wwBorder, wwIncMode]
- MoveSpeed = 4
- SlowMotionDiv = 4
- Max = 9
- DefaultValue = 0
- OnChange = StartHourDigChange
- MouseButton = mbLeft
- BmpList = SynthResModule.DigitsIL
- NumDigits = 1
- end
- object EndHourDig: TDigiWheel
- Tag = -9
- Left = 289
- Top = 55
- Width = 7
- Height = 8
- Cursor = crSizeNS
- Options = [wwBorder, wwIncMode]
- MoveSpeed = 4
- SlowMotionDiv = 4
- Max = 9
- DefaultValue = 0
- OnChange = StartHourDigChange
- MouseButton = mbLeft
- BmpList = SynthResModule.DigitsIL
- NumDigits = 1
- end
- object EndMinuteDig: TDigiWheel
- Tag = -10
- Left = 299
- Top = 55
- Width = 14
- Height = 8
- Cursor = crSizeNS
- Options = [wwBorder, wwIncMode]
- MoveSpeed = 4
- SlowMotionDiv = 4
- Max = 59
- DefaultValue = 0
- OnChange = StartHourDigChange
- MouseButton = mbLeft
- BmpList = SynthResModule.DigitsIL
- NumDigits = 2
- end
- object EndSecondDig: TDigiWheel
- Tag = -11
- Left = 316
- Top = 55
- Width = 14
- Height = 8
- Cursor = crSizeNS
- Options = [wwBorder, wwIncMode]
- MoveSpeed = 4
- SlowMotionDiv = 4
- Max = 59
- DefaultValue = 0
- OnChange = StartHourDigChange
- MouseButton = mbLeft
- BmpList = SynthResModule.DigitsIL
- NumDigits = 2
- end
- object PosMSDig: TQuickDigiLabel
- Tag = -8
- Left = 151
- Top = 55
- Width = 21
- Height = 8
- BmpList = SynthResModule.DigitsIL
- end
- object KeepOnDiskBtn: TQuickBtn
- Tag = -1
- Left = 333
- Top = 87
- Width = 14
- Height = 14
- Cursor = crHandPoint
- ParentColor = True
- PopupMenu = SynthResModule.WheelMenu
- Options = [tbHasDownGlyph, tbTrashGlyph, tbAutoSize]
- AccelKey = 0
- FXType = FX_Blend
- BmpList = SynthResModule.LightIL
- OnClick = KeepOnDiskBtnClick
- end
- object ExtractAllBtn: TQuickBtn
- Tag = -2
- Left = 351
- Top = 87
- Width = 14
- Height = 14
- Cursor = crHandPoint
- ParentColor = True
- PopupMenu = SynthResModule.WheelMenu
- Options = [tbHasDownGlyph, tbTrashGlyph, tbAutoSize]
- AccelKey = 0
- FXType = FX_Blend
- BmpList = SynthResModule.LightIL
- OnClick = KeepOnDiskBtnClick
- end
- object ForceMixDownBtn: TQuickBtn
- Tag = -3
- Left = 333
- Top = 104
- Width = 14
- Height = 14
- Cursor = crHandPoint
- Visible = False
- ParentColor = True
- PopupMenu = SynthResModule.WheelMenu
- Options = [tbHasDownGlyph, tbTrashGlyph, tbAutoSize]
- AccelKey = 0
- FXType = FX_Blend
- BmpList = SynthResModule.LightIL
- OnClick = KeepOnDiskBtnClick
- end
- object ExtractRangeBtn: TQuickBtn
- Tag = -4
- Left = 351
- Top = 104
- Width = 14
- Height = 14
- Cursor = crHandPoint
- ParentColor = True
- PopupMenu = SynthResModule.WheelMenu
- Options = [tbHasDownGlyph, tbTrashGlyph, tbAutoSize]
- AccelKey = 0
- FXType = FX_Blend
- BmpList = SynthResModule.LightIL
- OnClick = KeepOnDiskBtnClick
- end
- object TimeSlider: TTimeSlider
- Left = 12
- Top = 8
- Width = 352
- Height = 25
- Background = SynthResModule.SliderBackIL
- BmpList = SynthResModule.ArrowIL
- LineColor = 12903933
- LineWidth = 3
- NormalCursor = crDefault
- PointerCursor = crHandPoint
- TwoSidedPointers = True
- OnPositionsChanged = TimeSliderPositionsChanged
- OnPositionsChangeEnd = TimeSliderPositionsChangeEnd
- end
- end
- object ControlBottomPanel: TWPControl
- Left = 0
- Top = 366
- Width = 375
- Height = 46
- OnDropFiles = VideoPanelDropFiles
- Color = clGray
- ParentColor = False
- ShowHint = True
- OnMouseDown = ControlBottomPanelMouseDown
- OnMouseMove = ControlBottomPanelMouseMove
- OnMouseUp = ControlBottomPanelMouseUp
- Anchors = [akLeft, akRight, akBottom]
- object VolumeWheel: TLineWheel
- Left = 265
- Top = 15
- Width = 11
- Height = 11
- Hint = '|^b^aVolume'
- Options = [wwBigLine]
- MoveSpeed = 4
- SlowMotionDiv = 4
- Max = 127
- Value = 100
- DefaultValue = 100
- OnChange = WheelChange
- MouseButton = mbLeft
- HotSideX = 11
- HotSideY = 11
- PopupMenu = SynthResModule.WheelMenu
- LineColor = 12564396
- LinePressedColor = 8230648
- LineThickness = 1
- end
- object MuteBtn: TQuickBtn
- Tag = 1
- Left = 200
- Top = 12
- Width = 19
- Height = 18
- Cursor = crHandPoint
- Hint = '|^b^aMute'
- ParentColor = True
- PopupMenu = SynthResModule.WheelMenu
- Options = [tbHasDownGlyph, tbTrashGlyph, tbAutoSize]
- AccelKey = 0
- FXType = FX_Blend
- BmpList = SynthResModule.MuteIL
- OnClick = WheelChange
- end
- object LoopBtn: TQuickBtn
- Tag = -1
- Left = 16
- Top = 12
- Width = 19
- Height = 18
- Cursor = crHandPoint
- Hint = '|^b^aLoop'
- ParentColor = True
- Options = [tbHasDownGlyph, tbTrashGlyph, tbAutoSize]
- AccelKey = 0
- FXType = FX_Blend
- BmpList = SynthResModule.MuteIL
- OnClick = LoopBtnClick
- end
- object KeepAspectRatioBtn: TQuickBtn
- Tag = -1
- Left = 81
- Top = 12
- Width = 19
- Height = 18
- Cursor = crHandPoint
- ParentColor = True
- Options = [tbHasDownGlyph, tbTrashGlyph, tbAutoSize]
- AccelKey = 0
- FXType = FX_Blend
- BmpList = SynthResModule.MuteIL
- OnClick = KeepAspectRatioBtnClick
- end
- object HideWP: TWPControl
- Left = 140
- Top = 7
- Width = 55
- Height = 19
- Color = clBlack
- ParentColor = False
- ShowHint = True
- end
- end
- object FilePanel: TWPControl
- Left = 0
- Top = 0
- Width = 375
- Height = 38
- OnDropFiles = VideoPanelDropFiles
- Color = clGray
- ParentColor = False
- ShowHint = True
- Anchors = [akLeft, akTop, akRight]
- object OpenBtn: TQuickBtn
- Tag = -1
- Left = 336
- Top = 10
- Width = 23
- Height = 17
- Cursor = crHandPoint
- ParentColor = True
- Caption = 'OpenBtn'
- Options = [tbHasDownGlyph, tbTrashGlyph, tbAutoSize]
- AccelKey = 0
- FXType = FX_Blend
- BmpList = SynthResModule.OpenIL
- OnClick = OpenBtnClick
- StayDown = False
- Anchors = [akTop, akRight]
- end
- end
- end
- end
-